home *** CD-ROM | disk | FTP | other *** search
Text File | 1997-08-18 | 3.4 KB | 111 lines | [TEXT/LMAN] |
- startup="
- test -e \"${init}\" \"1\" goto done
- set ini_file \"inst-n.ini\"
- rprofile -f ${ini_file} location area fb_location
- test ! -e \"${fb_location}\" \"\" goto done
- set init \"1\"
- popup @f100,100 location
- done:
- @set_area_N"
-
- startup1="set fb_location location
- @set_area_N
- wprofile -f ${ini_file} location area ${fb_location}"
-
- save_form="
- set fb_description fb_description
- set fb_jobno fb_jobno
- set fb_jobno fb_jobno
- set fb_imageuse fb_imageuse
- set fb_printrun fb_printrun
- set fb_imagesize fb_imagesize
- set fb_period fb_period
- set fb_promoting fb_promoting
- set fb_client fb_client
- set fb_dist fb_dist
- set fb_deadline fb_deadline
- set fb_publication fb_publication
- set fb_issue fb_issue
- set fb_cust_retail fb_cust_retail
- set fb_cust_travel fb_cust_travel
- set fb_cust_finance fb_cust_finance
- set fb_cust_manufacturing fb_cust_manufacturing
- set fb_cust_industrial fb_cust_industrial
- set fb_cust_it fb_cust_it
- set fb_cust_public fb_cust_public
- set fb_cust_other fb_cust_other
- set fb_cust_charity fb_cust_charity
- set fb_insertions fb_insertions
- set fb_front fb_front
- nop
- set fb_company fb_company
- wprofile -f ${ini_file} faxback company ${fb_company}
- set fb_nature fb_nature
- wprofile -f ${ini_file} faxback nature ${fb_nature}
- set fb_nametitle fb_nametitle
- wprofile -f ${ini_file} faxback nametitle ${fb_nametitle}
- set fb_address fb_address
- wprofile -f ${ini_file} faxback address ${fb_address}
- set fb_country fb_country
- wprofile -f ${ini_file} faxback country ${fb_country}
- set fb_phone fb_phone
- wprofile -f ${ini_file} faxback phone ${fb_phone}
- set fb_fax fb_fax
- wprofile -f ${ini_file} faxback fax ${fb_fax}
- set fb_email fb_email
- wprofile -f ${ini_file} faxback email ${fb_email}
- "
-
- load_form="
- paste fb_description \"${fb_description}\"
- paste fb_jobno \"${fb_jobno}\"
- paste fb_imageuse \"${fb_imageuse}\"
- paste fb_printrun \"${fb_printrun}\"
- paste fb_imagesize \"${fb_imagesize}\"
- paste fb_period \"${fb_period}\"
- paste fb_promoting \"${fb_promoting}\"
- paste fb_client \"${fb_client}\"
- paste fb_dist \"${fb_dist}\"
- paste fb_deadline \"${fb_deadline}\"
- paste fb_publication \"${fb_publication}\"
- paste fb_issue \"${fb_issue}\"
- select fb_cust_retail -${fb_cust_retail}f
- select fb_cust_travel -${fb_cust_travel}f
- select fb_cust_finance -${fb_cust_finance}f
- select fb_cust_manufacturing -${fb_cust_manufacturing}f
- select fb_cust_industrial -${fb_cust_industrial}f
- select fb_cust_it -${fb_cust_it}f
- select fb_cust_public -${fb_cust_public}f
- select fb_cust_other -${fb_cust_other}f
- select fb_cust_charity -${fb_cust_charity}f
- paste fb_insertions \"${fb_insertions}\"
- test -e \"${fb_front}\" \"\" goto f1
- select fb_front -1
- goto f2
- f1: select fb_front_no -1
- f2:
- rprofile -f ${ini_file} faxback company fb_company
- rprofile -f ${ini_file} faxback nature fb_nature
- rprofile -f ${ini_file} faxback nametitle fb_nametitle
- rprofile -f ${ini_file} faxback address fb_address
- rprofile -f ${ini_file} faxback country fb_country
- rprofile -f ${ini_file} faxback phone fb_phone
- rprofile -f ${ini_file} faxback fax fb_fax
- rprofile -f ${ini_file} faxback email fb_email
- paste fb_company \"${fb_company}\"
- paste fb_nature \"${fb_nature}\"
- paste fb_nametitle \"${fb_nametitle}\"
- paste fb_address \"${fb_address}\"
- paste fb_country \"${fb_country}\"
- paste fb_phone \"${fb_phone}\"
- paste fb_fax \"${fb_fax}\"
- paste fb_email \"${fb_email}\""
-
- # helper for search screen for popup lists to select "keyword mode"
- popup_search="
- select lb -d <dict: -d2 kw
- select rb_kw
- set cfield \"\"
- paste tb \"\"
- popup -f spopup"
-